From 0b71e78dc6e79b2f4b102a1702c28f6620ba0857 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Jan=20Dj=C3=A4rv?= Date: Sun, 22 Jul 2007 12:13:24 +0000 Subject: [PATCH] (x-handle-no-bitmap-icon): New function. --- lisp/term/x-win.el | 3 +++ 1 file changed, 3 insertions(+) diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el index 4e80589ad43..efe6275c8f7 100644 --- a/lisp/term/x-win.el +++ b/lisp/term/x-win.el @@ -129,6 +129,9 @@ initial-frame-alist) x-invocation-args (cdr x-invocation-args))))))) +(defun x-handle-no-bitmap-icon (switch) + (setq default-frame-alist (cons '(icon-type) default-frame-alist))) + ;; Make -iconic apply only to the initial frame! (defun x-handle-iconic (switch) (setq initial-frame-alist -- 2.30.2